﻿'Imports log4net

'Namespace Instrumentacao

'    ''' <summary>
'    ''' Classe para criação de Logs (Log4Net)
'    ''' </summary>
'    ''' <remarks></remarks>
'    Public Class Log4netLogger
'        Implements ILogger

'        Private log As ILog

'        ''' <summary>
'        ''' Instanciando um novo Log.
'        ''' </summary>
'        ''' <param name="classType">Type</param>
'        ''' <remarks></remarks>
'        Public Sub New(ByVal classType As Type)
'            log = LogManager.GetLogger(classType)
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Debug
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <remarks></remarks>
'        Public Sub Debug(ByVal mensagem As String) Implements ILogger.Debug
'            If (log.IsDebugEnabled()) Then
'                log.Debug(mensagem)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Debug
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <param name="exception">Exception</param>
'        ''' <remarks></remarks>
'        Public Sub Debug(ByVal mensagem As String, ByVal exception As Exception) Implements ILogger.Debug
'            If (log.IsDebugEnabled()) Then
'                log.Debug(mensagem, exception)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Erro
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <remarks></remarks>
'        Public Sub [Error](ByVal mensagem As String) Implements ILogger.Error
'            If (log.IsErrorEnabled()) Then
'                log.Error(mensagem)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Erro
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <param name="exception">Exception</param>
'        ''' <remarks></remarks>
'        Public Sub [Error](ByVal mensagem As String, ByVal exception As Exception) Implements ILogger.Error
'            If (log.IsErrorEnabled()) Then
'                log.Error(mensagem, exception)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Fatal Error
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <remarks></remarks>
'        Public Sub Fatal(ByVal mensagem As String) Implements ILogger.Fatal
'            If (log.IsFatalEnabled()) Then
'                log.Fatal(mensagem)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Fatal Error
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <param name="exception">Exception</param>
'        ''' <remarks></remarks>
'        Public Sub Fatal(ByVal mensagem As String, ByVal exception As Exception) Implements ILogger.Fatal
'            If (log.IsFatalEnabled()) Then
'                log.Fatal(mensagem, exception)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Informação
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <remarks></remarks>
'        Public Sub Info(ByVal mensagem As String) Implements ILogger.Info
'            If (log.IsInfoEnabled()) Then
'                log.Info(mensagem)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Informação
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <param name="exception">Exception</param>
'        ''' <remarks></remarks>
'        Public Sub Info(ByVal mensagem As String, ByVal exception As Exception) Implements ILogger.Info
'            If (log.IsInfoEnabled()) Then
'                log.Info(mensagem, exception)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Avisos
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <remarks></remarks>
'        Public Sub Warn(ByVal mensagem As String) Implements ILogger.Warn
'            If (log.IsWarnEnabled()) Then
'                log.Warn(mensagem)
'            End If
'        End Sub

'        ''' <summary>
'        ''' Log no nível de Avisos
'        ''' </summary>
'        ''' <param name="mensagem">String</param>
'        ''' <param name="exception">Exception</param>
'        ''' <remarks></remarks>
'        Public Sub Warn(ByVal mensagem As String, ByVal exception As Exception) Implements ILogger.Warn
'            If (log.IsWarnEnabled()) Then
'                log.Warn(mensagem, exception)
'            End If
'        End Sub
'    End Class
'End Namespace
